Public Class Form1
    Class datos
        Public nombre As String
        Public apellido As String
        Public Sub New()
            nombre = "luis"
            apellido = "damiano"
        End Sub
        Public Sub New(ByVal _ape As String, ByVal _nom As String)
            nombre = _nom
            apellido = _ape
        End Sub
        Public Function armado() As String
            Return apellido & ", " & nombre
        End Function

    End Class
   
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim datos1 As New datos("Damiano", "Esteban")
        Dim datos2 As New datos

        MsgBox(datos1.armado())
        MsgBox(datos2.armado())

    End Sub
End Class
